GLS[MUS,LCS]2 - www.SailDart.org

perm filename GLS[MUS,LCS]2 blob sn#271078 filedate 1977-03-23 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	 
C00014 ENDMK
C⊗;
 
INSTRUMENT GLIA;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIB;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIC;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLID;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIE;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIF;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIG;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIH;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLII;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIJ;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIK;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIL;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIM;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIN;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIO;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIP;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIQ;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIR;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIS;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIT;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIU;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIV;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIW;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIX;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIY;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
INSTRUMENT GLIZ;     
OSCIL[10](P4,10*MAG/P2,P5);
OSCIL((P7-P3)*MAG,MAG/P2,P8);
COSCIL(U1,P3*MAG+U2,P6);<P6 IS TONE COLOR FOR 'GLISS'
OUTA←OUTA+U3;
END;
ARRAY F10(512);SEG(F10);0 1 1 100;
<<PLAY;GLIA 0 .2 C 1200 F1 F3 C*2 F10;FINISH;

INSTRUMENT CLARA;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARB;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARC;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARD;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARE;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARF;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARG;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARH;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARI;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARJ;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARK;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARL;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARM;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARN;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARO;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARP;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARQ;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARR;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARS;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLART;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARU;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARV;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARW;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARX;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARY;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;
INSTRUMENT CLARZ;    
OSCIL[10](P4,10*MAG/P2,P5);
COSCIL(U1,P3*MAG,P7);< P7 IS TONE COLOR FOR 'CLAR'
OUTA←OUTA+U2;
END;